/**
设备 
关机状态长按 减 按钮，进入地址编辑
加 减 按钮一起按下，进入童锁模式
开机状态下 按 S+M+加号键，重置。重置之后记得修改地址为不同。

***/


var CRC = {};
 
CRC._auchCRCHi = [
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
    0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
    0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
    0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
    0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
    0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
    0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
    0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
    0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
    0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
    0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
    0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
    0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
    0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
    0x80, 0x41, 0x00, 0xC1, 0x81, 0x40
];
CRC._auchCRCLo = [
    0x00, 0xC0, 0xC1, 0x01, 0xC3, 0x03, 0x02, 0xC2, 0xC6, 0x06,
    0x07, 0xC7, 0x05, 0xC5, 0xC4, 0x04, 0xCC, 0x0C, 0x0D, 0xCD,
    0x0F, 0xCF, 0xCE, 0x0E, 0x0A, 0xCA, 0xCB, 0x0B, 0xC9, 0x09,
    0x08, 0xC8, 0xD8, 0x18, 0x19, 0xD9, 0x1B, 0xDB, 0xDA, 0x1A,
    0x1E, 0xDE, 0xDF, 0x1F, 0xDD, 0x1D, 0x1C, 0xDC, 0x14, 0xD4,
    0xD5, 0x15, 0xD7, 0x17, 0x16, 0xD6, 0xD2, 0x12, 0x13, 0xD3,
    0x11, 0xD1, 0xD0, 0x10, 0xF0, 0x30, 0x31, 0xF1, 0x33, 0xF3,
    0xF2, 0x32, 0x36, 0xF6, 0xF7, 0x37, 0xF5, 0x35, 0x34, 0xF4,
    0x3C, 0xFC, 0xFD, 0x3D, 0xFF, 0x3F, 0x3E, 0xFE, 0xFA, 0x3A,
    0x3B, 0xFB, 0x39, 0xF9, 0xF8, 0x38, 0x28, 0xE8, 0xE9, 0x29,
    0xEB, 0x2B, 0x2A, 0xEA, 0xEE, 0x2E, 0x2F, 0xEF, 0x2D, 0xED,
    0xEC, 0x2C, 0xE4, 0x24, 0x25, 0xE5, 0x27, 0xE7, 0xE6, 0x26,
    0x22, 0xE2, 0xE3, 0x23, 0xE1, 0x21, 0x20, 0xE0, 0xA0, 0x60,
    0x61, 0xA1, 0x63, 0xA3, 0xA2, 0x62, 0x66, 0xA6, 0xA7, 0x67,
    0xA5, 0x65, 0x64, 0xA4, 0x6C, 0xAC, 0xAD, 0x6D, 0xAF, 0x6F,
    0x6E, 0xAE, 0xAA, 0x6A, 0x6B, 0xAB, 0x69, 0xA9, 0xA8, 0x68,
    0x78, 0xB8, 0xB9, 0x79, 0xBB, 0x7B, 0x7A, 0xBA, 0xBE, 0x7E,
    0x7F, 0xBF, 0x7D, 0xBD, 0xBC, 0x7C, 0xB4, 0x74, 0x75, 0xB5,
    0x77, 0xB7, 0xB6, 0x76, 0x72, 0xB2, 0xB3, 0x73, 0xB1, 0x71,
    0x70, 0xB0, 0x50, 0x90, 0x91, 0x51, 0x93, 0x53, 0x52, 0x92,
    0x96, 0x56, 0x57, 0x97, 0x55, 0x95, 0x94, 0x54, 0x9C, 0x5C,
    0x5D, 0x9D, 0x5F, 0x9F, 0x9E, 0x5E, 0x5A, 0x9A, 0x9B, 0x5B,
    0x99, 0x59, 0x58, 0x98, 0x88, 0x48, 0x49, 0x89, 0x4B, 0x8B,
    0x8A, 0x4A, 0x4E, 0x8E, 0x8F, 0x4F, 0x8D, 0x4D, 0x4C, 0x8C,
    0x44, 0x84, 0x85, 0x45, 0x87, 0x47, 0x46, 0x86, 0x82, 0x42,
    0x43, 0x83, 0x41, 0x81, 0x80, 0x40
];
 
CRC.CRC16 = function (buffer) {
    var hi = 0xff;
    var lo = 0xff;
    for (var i = 0; i < buffer.length; i++) {
        var idx = hi ^ buffer[i];
        hi = (lo ^ CRC._auchCRCHi[idx]);
        lo = CRC._auchCRCLo[idx];
    }
    return CRC.padLeft((hi << 8 | lo).toString(16).toUpperCase(), 4, '0');
};
 
CRC.isArray = function (arr) {
    return Object.prototype.toString.call(arr) === '[object Array]';
};
 
CRC.ToCRC16 = function (str) {
    return CRC.CRC16(CRC.isArray(str) ? str : CRC.strToByte(str));
};
 
CRC.ToModbusCRC16 = function (str) {
    return CRC.CRC16(CRC.isArray(str) ? str : CRC.strToHex(str));
};
 
CRC.strToByte = function (str) {
    var tmp = str.split(''), arr = [];
    for (var i = 0, c = tmp.length; i < c; i++) {
        var j = encodeURI(tmp[i]);
        if (j.length == 1) {
            arr.push(j.charCodeAt());
        } else {
            var b = j.split('%');
            for (var m = 1; m < b.length; m++) {
                arr.push(parseInt('0x' + b[m]));
            }
        }
    }
    return arr;
};
 
CRC.convertChinese = function (str) {
    var tmp = str.split(''), arr = [];
    for (var i = 0, c = tmp.length; i < c; i++) {
        var s = tmp[i].charCodeAt();
        if (s <= 0 || s >= 127) {
            arr.push(s.toString(16));
        }
        else {
            arr.push(tmp[i]);
        }
    }
    return arr;
};
 
CRC.filterChinese = function (str) {
    var tmp = str.split(''), arr = [];
    for (var i = 0, c = tmp.length; i < c; i++) {
        var s = tmp[i].charCodeAt();
        if (s > 0 && s < 127) {
            arr.push(tmp[i]);
        }
    }
    return arr;
};
 
CRC.strToHex = function (hex, isFilterChinese) {
    hex = isFilterChinese ? CRC.filterChinese(hex).join('') : CRC.convertChinese(hex).join('');
 
    //清除所有空格
    hex = hex.replace(/\s/g, "");
    //若字符个数为奇数，补一个空格
    hex += hex.length % 2 != 0 ? " " : "";
 
    var c = hex.length / 2, arr = [];
    for (var i = 0; i < c; i++) {
        arr.push(parseInt(hex.substr(i * 2, 2), 16));
    }
    return arr;
};
 
CRC.padLeft = function (s, w, pc) {
    if (pc == undefined) {
        pc = '0';
    }
    for (var i = 0, c = w - s.length; i < c; i++) {
        s = pc + s;
    }
    return s;
};


// console.log(CRC.ToModbusCRC16('0203028890', true));







var utilsx = {}
utilsx.lockTime = 0
utilsx.mindelay = 150 //相邻的指令，间隔150
utilsx.receiveDelay = 80;

// 左边补0
utilsx.strPadding = function(s,len){
    if (s.length < len) {
        var num = len-s.length
        var z = ''
        for (var i = 0; i < num; i++) {
            z += '0'
        }
        return z + s;
    }
    return s
}

// 0203002E00010000 -> [2, 3, 0, 46, 0, 1, 0, 0]
// utilsx.hexToArray('0203002E00010000')
utilsx.hexToArray = function(s) {
    var ret = [];
    var len = s.length
    if (length % 2 == 1) {
        s = s + '0'
        len = s.length
    }
    var clen = len / 2;
    for (var i = 0; i < clen; i++) {
        var c = s.substring(i * 2, i * 2 + 2);
        ret.push(parseInt(c, 16));
    }
    // console.log(ret)
    return ret;
}

// [2, 3, 2, 136, 144, 154, 40] -> 02030288909a28
// var mStr = utilsx.arrayToHex([2, 3, 2, 136, 144, 154, 40]);
utilsx.arrayToHex = function(arr) {
    var mStr = '';
    for (var i = 0; i < arr.length; i++) {
        var item = arr[i]
        var s = item.toString(16);
        if (s.length == 1) {
            s = '0' + s
        }
        mStr += s;
    }
    return mStr.toUpperCase();
}

// utilsx.sendData(port,'0203002E0001',function(err, results){
//})
utilsx.sendData = function(portObj, hexStr, callback) {
    var nowTime = utilsx.nowTimestamp()
    console.log(nowTime + '/////发送', hexStr);
    portObj.write(utilsx.hexToArray(hexStr), function(err, results) {
        callback(err, results)
    });
}

// 当前时间戳
utilsx.nowTimestamp = function() {
    return new Date().getTime()
}

/// 队列发送命令
utilsx.orderList = []; //优先级最低
utilsx.orderList[0] = [] //优先级最低
utilsx.orderList[1] = [] //优先级其次
utilsx.orderList[2] = [] //优先级最高
utilsx.orderIndex = 0; //指令编号
utilsx.lastSendStart = 0; //上次发送指令开始时间
utilsx.doingOrder = null; //正在做的指令
utilsx.receive = ''; //接收的数据，可能是多段接收


// console.log(CRC.ToModbusCRC16('0203028890', true)


utilsx.ToModbusCRC16 = function(cmd){
    var s = cmd.substring(0,cmd.length - 4)
    console.log(s,cmd)
    return (s + CRC.ToModbusCRC16('s', true)).toUpperCase()
}
/**
retlen 期望返回的字符串长度
priority = 优先级，越大优先级越高 0～2
**/
utilsx.sendOrder = function(portObj, cmd, priority, callback, retlen) {
    cmd = utilsx.ToModbusCRC16(cmd)
    utilsx.portObj = portObj
    var orderObj = {}
    utilsx.orderIndex++
    orderObj.orderIndex = utilsx.orderIndex
    orderObj.portObj = portObj
    orderObj.cmd = cmd
    orderObj.priority = priority
    orderObj.callback = callback
    orderObj.retlen = retlen
    utilsx.orderList[priority].push(orderObj) //指令送入队列
    console.log(utilsx.nowTimestamp() + 'utilsx 加入指令队列', cmd)
    utilsx.checkOrderRun()
}

// 
utilsx.checkOrderRun = function() {
    var now = utilsx.nowTimestamp()
    ///utilsx.mindelay
    var pass_time = now - utilsx.lastSendStart 
    if (pass_time < utilsx.mindelay) {
        var wait = utilsx.mindelay - pass_time
        console.log('需要等待'+wait+'秒发送下一条命令')
        setTimeout(function(){
            utilsx.checkOrderRun()
        },wait);
        return;
    }
    if (utilsx.doingOrder) {
        
        if (now - utilsx.lastSendStart < 1000) { //超过1000毫秒
            console.log('有命令正在执行，请稍等')
            return;
        }
        // 
        // console.log('utilsx 超时结束', utilsx.doingOrder)
        // console.log('utilsx 超时结束', now + "/" + utilsx.lastSendStart)
        // console.log('time', now - utilsx.lastSendStart)

        var ret = {
            retCmd: utilsx.receive,
            cmd: utilsx.doingOrder.cmd,
            stime: utilsx.doingOrder.startTimestamp,
            etime: utilsx.nowTimestamp(),
            msg: 'fail'
        }
        var callback = utilsx.doingOrder.callback
        if (callback) {
            callback(ret)
        }
        utilsx.doingOrder = null;
        utilsx.receive = ''
        utilsx.checkOrderRun();
        return;
    }
    var readyOrder = null;
    // 优先级从高到低发送
    for (var i = utilsx.orderList.length - 1; i > 0; i--) {
        var list = utilsx.orderList[i];
        // console.log('list=',list)
        if (list.length > 0) {
            readyOrder = list[0]
            // console.log('即将执行',readyOrder)
            list.splice(0, 1) //
            break;
        }
    }
    // console.log('即将执行',readyOrder)
    if (readyOrder == null) {
        utilsx.doingOrder = null
    } else {
        // 发送指令
        utilsx.receive = ''; //清空接收
        utilsx.doingOrder = readyOrder
        console.log('utilsx sendData', utilsx.doingOrder.cmd)
        var nowT = utilsx.nowTimestamp()
        utilsx.lastSendStart = utilsx.doingOrder.startTimestamp = nowT
        utilsx.sendData(utilsx.portObj, utilsx.doingOrder.cmd, function(err, results) {
            if (err) {
                console.log(err)
                utilsx.doingOrder = null
                utilsx.checkOrderRun() //继续下一个命令查找
            } else {
                // console.log('命令发送成功')
                utilsx.doingOrder = readyOrder
                var nowT = utilsx.nowTimestamp()
                utilsx.lastSendStart = utilsx.doingOrder.startTimestamp = nowT
                console.log('lastSendStart=', utilsx.lastSendStart)
                setTimeout(function() {
                    utilsx.checkOrderRun();
                }, 1000);

            }
        })
    }
}

// 串口接收字符串这里统一处理
utilsx.onreceive = function(info) {
    var s = utilsx.arrayToHex(info)
    console.log(utilsx.nowTimestamp() + 'RECV 返回值', s)
    utilsx.receive = utilsx.receive + s;
    if (utilsx.doingOrder) {
        var retlen = utilsx.doingOrder.retlen
        if (retlen > 0 && utilsx.receive.length >= retlen) {
            var ret = {
                cmd: utilsx.doingOrder.cmd,
                retCmd: utilsx.receive,
                t: utilsx.nowTimestamp() - utilsx.doingOrder.startTimestamp,
                stime: utilsx.doingOrder.startTimestamp,
                etime: utilsx.nowTimestamp()
            }
            console.log('---->',ret);
            var callback = utilsx.doingOrder.callback
            if (callback) {
                callback(ret)
                utilsx.doingOrder = null;
                utilsx.receive = ''
                utilsx.checkOrderRun();
            }
            utilsx.lastReceive = 0
            return;
        } else {
            console.log( utilsx.nowTimestamp()+'指令过短，需要等等剩余指令')
            // 等200毫秒，如果没有值，则返回
            utilsx.lastReceive = utilsx.nowTimestamp()
            setTimeout(function() {
                console.log( utilsx.nowTimestamp() + '指令过短，需要等等剩余指令2 //')
                if (utilsx.doingOrder && utilsx.lastReceive > 0 && utilsx.nowTimestamp() - utilsx.lastReceive >= utilsx.receiveDelay) { //说明等待期间没有指令过来
                    var ret = {
                        cmd: utilsx.doingOrder.cmd,
                        retCmd: utilsx.receive,
                        t: utilsx.nowTimestamp() - utilsx.doingOrder.startTimestamp,
                        stime: utilsx.doingOrder.startTimestamp,
                        etime: utilsx.nowTimestamp()
                    }
                    console.log('---->',ret);
                    var callback = utilsx.doingOrder.callback
                    if (callback) {
                        callback(ret)
                        utilsx.doingOrder = null;
                        utilsx.receive = ''
                        utilsx.checkOrderRun();
                    }
                    return;
                }
            }, utilsx.receiveDelay+10)
        }
    }
}
